home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 65.zip / BS1 part 65 / DevPac v3.02b.adf / include / devices / printer.i < prev    next >
Text File  |  1991-11-20  |  8KB  |  212 lines
  1.     IFND    DEVICES_PRINTER_I
  2. DEVICES_PRINTER_I    SET    1
  3. **
  4. **    $Filename: devices/printer.i $
  5. **    $Release: 1.3 $
  6. **
  7. **    printer device command definitions 
  8. **
  9. **    (C) Copyright 1985,1986,1987,1988 Commodore-Amiga, Inc.
  10. **        All Rights Reserved
  11. **
  12.  
  13.    IFND     EXEC_NODES_I
  14.    INCLUDE  "exec/nodes.i"
  15.    ENDC
  16.  
  17.    IFND     EXEC_LISTS_I
  18.    INCLUDE  "exec/lists.i"
  19.    ENDC
  20.  
  21.    IFND     EXEC_PORTS_I
  22.    INCLUDE  "exec/ports.i"
  23.    ENDC
  24.  
  25.    IFND     EXEC_IO_I
  26.    INCLUDE  "exec/io.i"
  27.    ENDC
  28.  
  29.    DEVINIT
  30.  
  31.    DEVCMD   PRD_RAWWRITE
  32.    DEVCMD   PRD_PRTCOMMAND
  33.    DEVCMD   PRD_DUMPRPORT
  34.    DEVCMD   PRD_QUERY
  35.  
  36. ;****** printer definitions
  37. aRIS     EQU    0 ; ESCc  reset                  ISO
  38. aRIN     EQU    1 ; ESC#1 initialize              +++
  39. aIND     EQU    2 ; ESCD  lf                  ISO
  40. aNEL     EQU    3 ; ESCE  return,lf              ISO
  41. aRI     EQU    4 ; ESCM  reverse lf              ISO
  42.  
  43. aSGR0     EQU    5 ; ESC[0m normal char set          ISO    
  44. aSGR3     EQU    6 ; ESC[3m italics on              ISO     
  45. aSGR23     EQU    7 ; ESC[23m italics off              ISO
  46. aSGR4     EQU    8 ; ESC[4m underline on              ISO
  47. aSGR24     EQU    9 ; ESC[24m underline off          ISO
  48. aSGR1     EQU   10 ; ESC[1m boldface on              ISO
  49. aSGR22     EQU   11 ; ESC[22m boldface off          ISO
  50. aSFC     EQU   12 ; SGR30-39  set foreground color    ISO
  51. aSBC     EQU   13 ; SGR40-49  set background color    ISO
  52.  
  53. aSHORP0     EQU   14 ; ESC[0w normal pitch              DEC
  54. aSHORP2     EQU   15 ; ESC[2w elite on              DEC
  55. aSHORP1     EQU   16 ; ESC[1w elite off              DEC
  56. aSHORP4     EQU   17 ; ESC[4w condensed fine on          DEC
  57. aSHORP3     EQU   18 ; ESC[3w condensed off          DEC
  58. aSHORP6     EQU   19 ; ESC[6w enlarged on              DEC
  59. aSHORP5     EQU   20 ; ESC[5w enlarged off              DEC
  60.  
  61. aDEN6     EQU   21 ; ESC[6"z shadow print on          DEC (sort of)
  62. aDEN5     EQU   22 ; ESC[5"z shadow print off          DEC
  63. aDEN4     EQU   23 ; ESC[4"z doublestrike on          DEC
  64. aDEN3     EQU   24 ; ESC[3"z doublestrike off          DEC
  65. aDEN2     EQU   25 ; ESC[2"z  NLQ on              DEC
  66. aDEN1     EQU   26 ; ESC[1"z  NLQ off              DEC
  67.  
  68. aSUS2     EQU   27 ; ESC[2v superscript on          +++
  69. aSUS1     EQU   28 ; ESC[1v superscript off          +++
  70. aSUS4     EQU   29 ; ESC[4v subscript on              +++
  71. aSUS3     EQU   30 ; ESC[3v subscript off          +++
  72. aSUS0     EQU   31 ; ESC[0v normalize the line          +++
  73. aPLU     EQU   32 ; ESCL  partial line up          ISO
  74. aPLD     EQU   33 ; ESCK  partial line down          ISO
  75.  
  76. aFNT0     EQU   34 ; ESC(B US char set         or Typeface  0 (default)
  77. aFNT1     EQU   35 ; ESC(R French char set    or Typeface  1
  78. aFNT2     EQU   36 ; ESC(K German char set    or Typeface  2
  79. aFNT3     EQU   37 ; ESC(A UK char set         or Typeface  3
  80. aFNT4     EQU   38 ; ESC(E Danish I char set  or Typeface  4
  81. aFNT5     EQU   39 ; ESC(H Sweden char set    or Typeface  5
  82. aFNT6     EQU   40 ; ESC(Y Italian char set   or Typeface  6
  83. aFNT7     EQU   41 ; ESC(Z Spanish char set   or Typeface  7
  84. aFNT8     EQU   42 ; ESC(J Japanese char set  or Typeface  8
  85. aFNT9     EQU   43 ; ESC(6 Norweign char set  or Typeface  9
  86. aFNT10     EQU   44 ; ESC(C Danish II char set or Typeface 10
  87.                   
  88. ;    Suggested typefaces are:
  89. ;
  90. ;     0 - default typeface.
  91. ;     1 - Line Printer or equiv.
  92. ;     2 - Pica or equiv.
  93. ;     3 - Elite or equiv.
  94. ;     4 - Helvetica or equiv.
  95. ;     5 - Times Roman or equiv.
  96. ;     6 - Gothic or equiv.
  97. ;     7 - Script or equiv.
  98. ;     8 - Prestige or equiv.
  99. ;     9 - Caslon or equiv.
  100. ;    10 - Orator or equiv.
  101. ;
  102.  
  103. aPROP2     EQU   45 ; ESC[2p  proportional on          +++
  104. aPROP1     EQU   46 ; ESC[1p  proportional off          +++
  105. aPROP0     EQU   47 ; ESC[0p  proportional clear          +++
  106. aTSS     EQU   48 ; ESC[n E set proportional offset   ISO
  107. aJFY5     EQU   49 ; ESC[5 F auto left justify          ISO
  108. aJFY7     EQU   50 ; ESC[7 F auto right justiy          ISO
  109. aJFY6     EQU   51 ; ESC[6 F auto full justify          ISO
  110. aJFY0     EQU   52 ; ESC[0 F auto justify off          ISO
  111. aJFY2     EQU   53 ; ESC[2 F  word space(auto center)  ISO (special)
  112. aJFY3     EQU   54 ; ESC[3 F letter space (justify)    ISO (special)
  113.  
  114. aVERP0     EQU   55 ; ESC[0z  1/8" line spacing          +++
  115. aVERP1     EQU   56 ; ESC[1z  1/6" line spacing          +++
  116. aSLPP     EQU   57 ; ESC[nt  set form length n          DEC
  117. aPERF     EQU   58 ; ESC[nq  perf skip n (n>0)          +++
  118. aPERF0     EQU   59 ; ESC[0q  perf skip off          +++
  119.             
  120. aLMS     EQU   60 ; ESC#9  Left margin set          +++
  121. aRMS     EQU   61 ; ESC#0  Right margin set          +++
  122. aTMS     EQU   62 ; ESC#8  Top margin set          +++
  123. aBMS     EQU   63 ; ESC#2  Bottom marg set          +++
  124. aSTBM     EQU   64 ; ESC[Pn1;Pn2r  T&B margins          DEC
  125. aSLRM     EQU   65 ; ESC[Pn1;Pn2s  L&R margin          DEC
  126. aCAM     EQU   66 ; ESC#3  Clear margins          +++
  127.  
  128. aHTS     EQU   67 ; ESCH    Set horiz tab          ISO
  129. aVTS     EQU   68 ; ESCJ    Set vertical tabs          ISO
  130. aTBC0     EQU   69 ; ESC[0g  Clr horiz tab          ISO
  131. aTBC3     EQU   70 ; ESC[3g  Clear all h tab          ISO
  132. aTBC1     EQU   71 ; ESC[1g  Clr vertical tabs          ISO
  133. aTBC4     EQU   72 ; ESC[4g  Clr all v tabs          ISO
  134. aTBCALL     EQU   73 ; ESC#4   Clr all h & v tabs          +++
  135. aTBSALL     EQU   74 ; ESC#5   Set default tabs          +++
  136. aEXTEND     EQU   75 ; ESC[Pn"x extended commands          +++ 
  137.  
  138. aRAW     EQU   76 ; ESC[Pn"r Next 'Pn' chars are raw  +++
  139.  
  140.  
  141.  STRUCTURE IOPrtCmdReq,IO_SIZE
  142.     UWORD   io_PrtCommand  ; printer command
  143.     UBYTE   io_Parm0    ; first command parameter
  144.     UBYTE   io_Parm1    ; second command parameter
  145.     UBYTE   io_Parm2    ; third command parameter
  146.     UBYTE   io_Parm3    ; fourth command parameter
  147.     LABEL   iopcr_SIZEOF
  148.  
  149.  STRUCTURE  IODRPReq,IO_SIZE
  150.     APTR    io_RastPort       ; raster port
  151.     APTR    io_ColorMap       ; color map
  152.     ULONG   io_Modes       ; graphics viewport modes
  153.     UWORD   io_SrcX       ; source x origin
  154.     UWORD   io_SrcY       ; source y origin
  155.     UWORD   io_SrcWidth       ; source x width
  156.     UWORD   io_SrcHeight   ; source x height
  157.     LONG    io_DestCols       ; destination x width
  158.     LONG    io_DestRows       ; destination y height
  159.     UWORD   io_Special       ; option flags
  160.     LABEL   iodrpr_SIZEOF
  161.  
  162. SPECIAL_MILCOLS        EQU    $0001    ; DestCols specified in 1/1000"
  163. SPECIAL_MILROWS        EQU    $0002    ; DestRows specified in 1/1000"
  164. SPECIAL_FULLCOLS    EQU    $0004    ; make DestCols maximum possible
  165. SPECIAL_FULLROWS    EQU    $0008    ; make DestRows maximum possible
  166. SPECIAL_FRACCOLS    EQU    $0010    ; DestCols is fraction of FULLCOLS
  167. SPECIAL_FRACROWS    EQU    $0020    ; DestRows is fraction of FULLROWS
  168. SPECIAL_CENTER        EQU    $0040    ; center image on paper
  169. SPECIAL_ASPECT        EQU    $0080    ; ensure correct aspect ratio
  170. SPECIAL_DENSITY1    EQU    $0100    ; lowest resolution (dpi)
  171. SPECIAL_DENSITY2    EQU    $0200    ; next res
  172. SPECIAL_DENSITY3    EQU    $0300    ; next res
  173. SPECIAL_DENSITY4    EQU    $0400    ; next res
  174. SPECIAL_DENSITY5    EQU    $0500    ; next res
  175. SPECIAL_DENSITY6    EQU    $0600    ; next res
  176. SPECIAL_DENSITY7    EQU    $0700    ; highest res
  177. SPECIAL_NOFORMFEED    EQU    $0800    ; don't eject paper after gfx prints
  178. SPECIAL_TRUSTME        EQU    $1000    ; don't reset on gfx prints
  179. ;
  180. ;    Compute print size, set 'io_DestCols' and 'io_DestRows' in the calling
  181. ;    program's 'IODRPReq' structure and exit, don't print.  This allows the
  182. ;    calling program to see what the final print size would be in printer
  183. ;    pixels.     Note that it modifies the 'io_DestCols' and 'io_DestRows'
  184. ;    fields of your 'IODRPReq' structure.  Also, set the print density and
  185. ;    update the 'MaxXDots', 'MaxYDots', 'XDotsInch', and 'YDotsInch' fields
  186. ;    of the 'PrinterExtendedData' structure.
  187. ;
  188. SPECIAL_NOPRINT        EQU    $2000    ; see above
  189.  
  190. PDERR_NOERR        EQU    0    ; clean exit, no errors
  191. PDERR_CANCEL        EQU    1    ; user cancelled print
  192. PDERR_NOTGRAPHICS    EQU    2    ; printer cannot output graphics
  193. PDERR_INVERTHAM        EQU    3    ; OBSOLETE
  194. PDERR_BADDIMENSION    EQU    4    ; print dimensions illegal
  195. PDERR_DIMENSIONOVFLOW    EQU    5    ; OBSOLETE
  196. PDERR_INTERNALMEMORY    EQU    6    ; no memory for internal variables
  197. PDERR_BUFFERMEMORY    EQU    7    ; no memory for print buffer
  198. ;
  199. ;    Note : this is an internal error that can be returned from the render
  200. ;    function to the printer device.     It is NEVER returned to the user.
  201. ;    If the printer device sees this error it converts it 'PDERR_NOERR'
  202. ;    and exits gracefully.  Refer to the document on
  203. ;    'How to Write a Graphics Printer Driver' for more info.
  204. ;
  205. PDERR_TOOKCONTROL    EQU    8    ; I took control in case 0 of render
  206.  
  207. ; internal use
  208. SPECIAL_DENSITYMASK    EQU $0700    ;  masks out density values
  209. SPECIAL_DIMENSIONSMASK    EQU SPECIAL_MILCOLS!SPECIAL_MILROWS!SPECIAL_FULLCOLS!SPECIAL_FULLROWS!SPECIAL_FRACCOLS!SPECIAL_FRACROWS!SPECIAL_ASPECT
  210.  
  211.     ENDC    ; DEVICES_PRINTER_I
  212.